home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / geswaug.dxr / 00003_GESGettingStarted Frane.ls < prev    next >
Encoding:
Text File  |  1996-06-14  |  581 b   |  31 lines
  1. on exitFrame
  2.   global IFLCanChange, GESDesOnStage, GESWhichXplor
  3.   go(the frame)
  4.   if GESWhichXplor = 0 then
  5.     GESExplorePc()
  6.   else
  7.     if GESWhichXplor = 1 then
  8.       GESInsideSystem()
  9.     else
  10.       if GESWhichXplor = 2 then
  11.         GESExploreNoteBook()
  12.       end if
  13.     end if
  14.   end if
  15.   if the mouseUp then
  16.     set IFLCanChange to 1
  17.   end if
  18.   if GESDesOnStage = 0 then
  19.     ADDAdvertBreak(6)
  20.   else
  21.     set the locH of sprite 48 to 2000
  22.     updateStage()
  23.   end if
  24.   if GESWhichXplor = 2 then
  25.     GESnoteQuitCD()
  26.   else
  27.     GESQuitCD()
  28.   end if
  29.   IFLsectionWordAnimate()
  30. end
  31.